home *** CD-ROM | disk | FTP | other *** search
/ PC Player 2004 May / pc player 2004-05.iso / Demos / FarCry / Data1.cab / _7BBB4CAF8CD54DC79589CF8AEACAB3A1 < prev    next >
Encoding:
Text File  |  2004-01-06  |  2.8 KB  |  87 lines
  1. -----------------------------------------------------------------------------
  2. function Hud:DrawCTFTeamScore(x,y,otherteamstate,team)
  3.     local tclr=self.teamrgb[team];
  4.     %System:DrawImageColor(self.white_dot, x, y, 30, 30, 4,tclr[1],tclr[2],tclr[3],0.4);
  5.     if(otherteamstate)then
  6.         %System:DrawImageColor(self.flag_icon,x,y,30,30,4,0.7,0.7,0.7,0.5);
  7.     else
  8.         %System:DrawImageColor(self.flag_icon,x,y,30,30,4,1,1,1,1);
  9.     end
  10. end
  11.  
  12. -----------------------------------------------------------------------------
  13. function Hud:DrawTeams(player)
  14.     ---TEAMS STUFFF------------------------------------
  15.     local team=Game:GetEntityTeam(player.id);
  16.     --if(team=="red")then
  17. --        %System:DrawImageColor(self.white_dot, 0, 559, 800, 600, 4,1,0,0,0.4);
  18.     --else
  19.     --    %System:DrawImageColor(self.white_dot, 0, 559, 800, 600, 4,0,0,1,0.4);
  20.     --end    
  21.     
  22.     local red_score=Game:GetTeamScore("red");
  23.     local blue_score=Game:GetTeamScore("blue");
  24.     
  25.     --%System:DrawImageColor(self.white_dot, 0, 0, 50, 30, 4,1,0,0,0.4);
  26.     --%Game:WriteHudNumber( 5, 0, red_score, 1, 1, 1, 1, 30, 30);
  27.     --%System:DrawImageColor(self.white_dot, 0, 31, 50, 30, 4,0,0,1,0.4);
  28.     --%Game:WriteHudNumber( 5, 30, blue_score, 1, 1, 1, 1, 30, 30);
  29.     
  30.     if(self.CTF)then
  31.         local red_carrier=Game:GetTeamFlags("red");
  32.         local blue_carrier=Game:GetTeamFlags("blue");
  33.         local red_captured,blue_captured;
  34.         if(red_carrier~=0)then
  35.             red_captured="X";
  36.         end
  37.         
  38.         if(blue_carrier~=0)then
  39.             blue_captured="X";
  40.         end
  41.         self:DrawCTFTeamScore(50,0,blue_captured,"red");
  42.         self:DrawCTFTeamScore(50,31,red_captured,"blue");
  43.         if(Game:GetTeamFlags(team)==player.id)then
  44.             %System:DrawImageColor(self.flag_icon,660,565,30,30,4,1,1,1,1);
  45.         end
  46.     end
  47. end
  48.  
  49. -----------------------------------------------------------------------------
  50. function Hud:CenterMessage()
  51.     %Game:SetHUDFont("default", "default");
  52.     %Game:WriteHudString(16, 80, self.centermessage, 1, 1, 0, 1, 14, 14);
  53.     self.centermessagetime=self.centermessagetime-_frametime;
  54.     if(self.centermessagetime<0)then
  55.         self.centermessage=nil;
  56.     end
  57. end
  58.  
  59. -- \param player - usually _localplayer
  60. function Hud:DrawCrosshairName(player)
  61.  
  62.     if player.cnt==nil then                
  63.         return;                                    -- player is dead?
  64.     end
  65.     
  66.     if not player.cnt.GetViewIntersection then
  67.         return                                    -- spectator ?
  68.     end
  69.  
  70.     -- make sure we use the right font
  71.     %Game:SetHUDFont("default", "default");
  72.     
  73.     local obj=player.cnt:GetViewIntersection();
  74.     if obj and obj.ent and obj.ent.entity_type=="player" then
  75.         if BasicPlayer.IsAlive(obj.ent) then
  76.             local color=self.teamcolors[Game:GetEntityTeam(obj.ent.id)];
  77.             if color then
  78.                 local name = color.."**$1"..obj.ent:GetName()..color.."**";
  79.                 
  80.                 local namesizex,namesizy = %Game:GetHudStringSize(name, 20, 20);
  81.                 local pos=400-(namesizex*0.5);
  82.                 
  83.                 %Game:WriteHudString(pos,210,name , 1, 1, 1, 1, 20,20);
  84.             end
  85.         end
  86.     end
  87. end